A5.TABLE_ENUM Function

Syntax

A5.Table_Enum(C lastname[,N options])

Table_List as C = A5.TABLE_ENUM( [ options as N ] )

Next_Table_Name as C = A5.TABLE_ENUM( lastname as C )

Arguments

Table_List

A list of tables in various formats, depending on the Flag variable.

Next_Table_Name

The next table the list of tables. A NULL value "" returns the first table in the list.

lastname

The quoted name of a table.

options

Optional. Default = Null.

Null = Table filename
4 = Full path and filename
8 = Quoted full path, and filename.

Description

The A5.TABLE_ENUM() method returns a CR-LF delimited list of all tables listed in the Control Panel. In contrast, the A5_TABLE_ENUM_ACTUAL() function checks to see that the table exists, or it is not included in the list.

Example

Refer also to A5 Enumeration Methods. This script updates the indexes for all of the tables in a database.

dim tbl as P
table_name = A5.table_enum("")
if (table_name <> "") then
    'While the table_enum method returns nonblank names, get next name
    while (table_name <> "")
        :Statusbar.Set_Text("Updating indexes for: " + table_name)
        tbl = table.open(table_name)
        tbl.update_production_index()
        tbl.close()
        table_name = A5.table_enum(table_name)
    end while
end if
:Statusbar.Set_Text("Done!!")

Limitations

Desktop applications only.